home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Diamond Collection / The Diamond Collection (Software Vault)(Digital Impact).ISO / cdr37 / fwklz202.zip / LOOKUPZ.BAT < prev    next >
DOS Batch File  |  1995-03-31  |  3KB  |  100 lines
  1. @echo off
  2. if "%1" == "" goto zz
  3. if not "%1" == "/*" goto aa
  4. if not "%2" == "..2.02" goto zz
  5. if exist QUERYFLA.GUP del QUERYFLA.GUP > nul
  6. if exist QUERYFLA.GUP attrib -r QUERYFLA.GUP > nul
  7. if exist QUERYFLA.GUP del QUERYFLA.GUP > nul
  8. goto us1
  9. :zz
  10. cls
  11. goto us0
  12. :usage
  13. echo.
  14. pause
  15. echo.
  16. :us0
  17. echo Part of FWKCS(TM) Contents_Signature System, Version 2.02.
  18. echo (C)Copyright Frederick W. Kantor 1989, 1995. All rights reserved.
  19. echo Your use of this program is at solely your own risk.
  20. echo.
  21. :us1
  22. echo LOOKUPZ.BAT  to find matching material on remote bulletin board systems;
  23. echo              or partial test if a zipfile might be appropriate to upload.
  24. echo.
  25. echo To use this, you must have Phil Katz's PKZIP(R) 2.04g in your current
  26. echo                directory or available on your path.
  27. echo              The BBS you are calling must be using FWKCS 2.00 or later.
  28. echo.
  29. echo Usage:   LOOKUPZ FILES.ZIP ASKFILE.ZIP "<enter>"  (for detailed reply)
  30. echo          LOOKUPZ FILES.ZIP ASKFILE.ZIP ! "<enter>"   (for short reply)
  31. echo.
  32. echo  where   FILES.ZIP    contains the files you want to look up (up to 512).
  33. echo.
  34. echo          ASKFILE.ZIP  by whatever name you give it, is the small zipfile
  35. echo                       you send to the BBS as your inquiry.
  36. echo.
  37. echo          ! is literal, and tells FWKCS to send a short reply without a
  38. echo            list of matching file(s).
  39. echo.
  40. echo  See LOOKUP.DOC.
  41. goto end
  42. :aa
  43. if "%2" == "" goto help1
  44. if "%1" == "%2" goto help2
  45. if not exist %1 goto help3
  46. if exist %2 goto help4
  47. if exist fwkcsloo.kup del fwkcsloo.kup > nul
  48. if exist fwkcsloo.kup attrib -r fwkcsloo.kup > nul
  49. if exist fwkcsloo.kup del fwkcsloo.kup > nul
  50. pkzip -v %1 > fwkcsloo.kup
  51. if not .%3 == .! goto wcs
  52. if exist $_$!$_$_.!#! del $_$!$_$_.!#! > nul
  53. if exist $_$!$_$_.!#! attrib -r $_$!$_$_.!#! > nul
  54. echo reply sans cs > $_$!$_$_.!#!
  55. type fwkcsloo.kup >> $_$!$_$_.!#!
  56. del fwkcsloo.kup > nul
  57. ren $_$!$_$_.!#! fwkcsloo.kup > nul
  58. :wcs
  59. pkzip %2 fwkcsloo.kup -om > nul
  60. if exist fwkcsloo.kup goto help5
  61. echo.
  62. echo Now, if you upload the zipfile "%2" to any BBS which runs
  63. echo   FWKCS(TM) Contents_Signature System, Version 2.00 or later,
  64. echo             Remote Contents_Signature Inquiry option,
  65. if .%3 == .! goto rsc
  66. echo you can quickly find what it has that
  67. echo matches the file(s) in "%1".
  68. goto end
  69. :rsc
  70. echo you can quickly get a short reply as to whether the BBS already has or
  71. echo recognizes much or all of the file(s) in "%1".
  72. goto end
  73. :help1
  74. echo.
  75. echo I also need to have the FILENAME.EXT to use for the output file.
  76. goto try
  77. :help2
  78. echo.
  79. echo The output file must be different from the input file.
  80. goto try
  81. :help3
  82. echo.
  83. echo did not find  %1
  84. goto try
  85. :help4
  86. echo.
  87. echo the output file "%2" already exists. First delete it, and then
  88. :try
  89. echo.
  90. echo   Please try again...
  91. goto usage
  92. :help5
  93. del FWKCSLOO.KUP > nul
  94. echo.
  95. echo What happened to Phil Katz's PKZIP(R)?  I didn't find it.
  96. echo.
  97. echo How am I supposed to do this work?
  98. :end
  99. echo.
  100.